home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World 2006 July & August
/
PCWorld_2006-07-08_cd.bin
/
v cisle
/
acehtml
/
acehtmlfreeware.exe
/
acehtmlfree.exe
/
0
/
RCDATA
/
TFRMVIEWER
/
TFRMVIEWER.txt
< prev
Wrap
Text File
|
2006-04-19
|
10KB
|
467 lines
object frmViewer: TfrmViewer
Left = 272
Top = 260
Align = alClient
BorderStyle = bsNone
ClientHeight = 242
ClientWidth = 651
Color = clActiveCaption
UseDockManager = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Icon.Data = {<image000.ico>}
KeyPreview = True
OldCreateOrder = False
Visible = True
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnEndDock = FormEndDock
OnHide = FormHide
OnKeyDown = FormKeyDown
OnShow = FormShow
OnStartDock = FormStartDock
ExplicitWidth = 320
ExplicitHeight = 240
PixelsPerInch = 96
TextHeight = 13
object ScrollBox: TScrollBox
Left = 0
Top = 22
Width = 651
Height = 220
HorzScrollBar.Tracking = True
VertScrollBar.Visible = False
Align = alClient
BevelInner = bvLowered
BevelOuter = bvRaised
BorderStyle = bsNone
TabOrder = 0
OnResize = ScrollBoxResize
object barStatus: TdxStatusBar
Left = 0
Top = 200
Width = 651
Height = 20
Panels = <
item
PanelStyleClassName = 'TdxStatusBarTextPanelStyle'
end>
PaintStyle = stpsOffice11
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Shell Dlg 2'
Font.Style = []
end
end
object RefreshTimer: TTimer
Enabled = False
OnTimer = RefreshTimerTimer
Left = 416
Top = 40
end
object barMan: TdxBarManager
AllowReset = False
AutoDockColor = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
Bars = <
item
AllowClose = False
AllowCustomizing = False
AllowQuickCustomizing = False
AllowReset = False
BorderStyle = bbsNone
Caption = 'Internal Viewer'
DockedDockingStyle = dsTop
DockedLeft = 0
DockedTop = 0
DockingStyle = dsTop
FloatLeft = 276
FloatTop = 213
FloatClientWidth = 23
FloatClientHeight = 22
ItemLinks = <
item
Item = bbRefresh
Visible = True
end
item
BeginGroup = True
Item = bbBack
Visible = True
end
item
Item = bbForward
Visible = True
end
item
BeginGroup = True
Item = bbStop
Visible = True
end
item
BeginGroup = True
Item = bbOpen
Visible = True
end
item
BeginGroup = True
Item = bbAddress
UserDefine = [udWidth]
UserWidth = 209
Visible = True
end
item
Item = bbBaseURL
Visible = True
end
item
BeginGroup = True
Item = bbRulers
Visible = True
end
item
Item = bbResolution
Visible = True
end
item
Item = bbDockOptions
Visible = True
end
item
Item = bbMax
Visible = True
end>
Name = 'Internal Viewer'
NotDocking = [dsNone, dsLeft, dsTop, dsRight, dsBottom]
OneOnRow = True
Row = 0
UseOwnFont = False
UseRestSpace = True
Visible = True
WholeRow = True
end>
CanCustomize = False
Categories.Strings = (
'Default'
'pmDockOptions'
'pmResolutions')
Categories.ItemsVisibles = (
2
2
2)
Categories.Visibles = (
True
True
True)
DockColor = clDefault
Images = frmTop.ilmenu
PopupMenuLinks = <>
Style = bmsOffice11
UseSystemFont = True
Left = 145
Top = 65
DockControlHeights = (
0
0
22
0)
object bbRefresh: TdxBarButton
Caption = 'Refresh'
Category = 0
Hint = 'Refresh'
Visible = ivAlways
ImageIndex = 207
OnClick = btnRefreshClick
end
object bbBack: TdxBarButton
Caption = 'Backward'
Category = 0
Hint = 'Backward'
Visible = ivAlways
ImageIndex = 208
OnClick = btnBackClick
end
object bbForward: TdxBarButton
Caption = 'Forward'
Category = 0
Hint = 'Forward'
Visible = ivAlways
ImageIndex = 209
OnClick = btnBackClick
end
object bbStop: TdxBarButton
Caption = 'Stop'
Category = 0
Hint = 'Stop'
Visible = ivAlways
ImageIndex = 210
OnClick = btnBackClick
end
object bbOpen: TdxBarButton
Caption = 'Open'
Category = 0
Hint = 'Open'
Visible = ivAlways
ImageIndex = 211
OnClick = btnOpenClick
end
object bbAddress: TdxBarCombo
Caption = 'Address:'
Category = 0
Hint = 'Address:'
Visible = ivAlways
OnChange = ComboURLChange
OnCurChange = bbAddressCurChange
OnKeyPress = ComboURLKeyPress
OnKeyUp = ComboURLKeyUp
ShowCaption = True
Width = 100
ItemIndex = -1
end
object bbBaseURL: TdxBarButton
Caption = 'Base URL'
Category = 0
Enabled = False
Hint = 'Base URL'
Visible = ivAlways
ButtonStyle = bsChecked
ImageIndex = 216
OnClick = bbBaseURLClick
end
object bbRulers: TdxBarButton
Caption = 'Rulers'
Category = 0
Hint = 'Rulers'
Visible = ivAlways
ButtonStyle = bsChecked
ImageIndex = 215
OnClick = btnShowRulersClick
end
object bbResolution: TdxBarSubItem
Caption = 'Maximum'
Category = 0
Visible = ivAlways
ImageIndex = 214
ItemLinks = <
item
Item = N640
Visible = True
end
item
Item = N800
Visible = True
end
item
Item = N1024
Visible = True
end
item
Item = NMax
Visible = True
end
item
Item = N240
Visible = True
end>
end
object miUndock: TdxBarButton
Caption = 'miUndock'
Category = 1
Visible = ivAlways
OnClick = miUndockClick
end
object miDockTab: TdxBarButton
Caption = 'miDockTab'
Category = 1
Visible = ivAlways
OnClick = miDockTabClick
end
object miDockBottom: TdxBarButton
Caption = 'miDockBottom'
Category = 1
Visible = ivAlways
OnClick = miDockTabClick
end
object miDockTop: TdxBarButton
Caption = 'miDockTop'
Category = 1
Visible = ivAlways
OnClick = miDockTabClick
end
object miDockLeft: TdxBarButton
Caption = 'miDockLeft'
Category = 1
Visible = ivAlways
OnClick = miDockTabClick
end
object miDockRight: TdxBarButton
Caption = 'miDockRight'
Category = 1
Visible = ivAlways
OnClick = miDockTabClick
end
object miClose: TdxBarButton
Caption = 'miClose'
Category = 1
Visible = ivAlways
OnClick = miCloseClick
end
object miShowStatusBar: TdxBarButton
Caption = 'miShowStatusBar'
Category = 1
Visible = ivAlways
ButtonStyle = bsChecked
OnClick = miShowStatusBarClick
end
object N640: TdxBarButton
Caption = 'N640'
Category = 2
Hint = 'N640'
Visible = ivAlways
ButtonStyle = bsChecked
GroupIndex = 1
OnClick = NMaxClick
end
object bbDockOptions: TdxBarSubItem
Caption = 'Dock Options'
Category = 0
Visible = ivAlways
ImageIndex = 212
ShowCaption = False
ItemLinks = <
item
Item = miUndock
Visible = True
end
item
BeginGroup = True
Item = miDockTab
Visible = True
end
item
Item = miDockBottom
Visible = True
end
item
Item = miDockTop
Visible = True
end
item
Item = miDockLeft
Visible = True
end
item
Item = miDockRight
Visible = True
end
item
BeginGroup = True
Item = miClose
Visible = True
end
item
BeginGroup = True
Item = miShowStatusBar
Visible = True
end>
end
object N800: TdxBarButton
Caption = 'N800'
Category = 2
Hint = 'N800'
Visible = ivAlways
ButtonStyle = bsChecked
GroupIndex = 1
OnClick = NMaxClick
end
object N1024: TdxBarButton
Caption = 'N1024'
Category = 2
Hint = 'N1024'
Visible = ivAlways
ButtonStyle = bsChecked
GroupIndex = 1
OnClick = NMaxClick
end
object NMax: TdxBarButton
Caption = 'NMax'
Category = 2
Hint = 'NMax'
Visible = ivAlways
ButtonStyle = bsChecked
GroupIndex = 1
Down = True
OnClick = NMaxClick
end
object N240: TdxBarButton
Caption = 'N240'
Category = 2
Hint = 'N240'
Visible = ivAlways
ButtonStyle = bsChecked
GroupIndex = 1
OnClick = NMaxClick
end
object bbMax: TdxBarButton
Caption = 'Maximize'
Category = 0
Hint = 'Maximize'
Visible = ivAlways
ButtonStyle = bsChecked
ImageIndex = 213
OnClick = btnFullScreenClick
end
end
object pmDockOptions: TdxBarPopupMenu
BarManager = barMan
ItemLinks = <
item
Item = miUndock
Visible = True
end
item
BeginGroup = True
Item = miDockTab
Visible = True
end
item
Item = miDockBottom
Visible = True
end
item
Item = miDockTop
Visible = True
end
item
Item = miDockLeft
Visible = True
end
item
Item = miDockRight
Visible = True
end
item
BeginGroup = True
Item = miClose
Visible = True
end
item
BeginGroup = True
Item = miShowStatusBar
Visible = True
end>
UseOwnFont = False
Left = 515
Top = 40
end
end